8 POKE56,56:CLR:POKE53371,0
10 DV=PEEK(186):IFDV<8THENDV=8
20 POKE53281,0:POKE53280,0:PRINT""
30 SYS57812"QSJUKE MOUSE 2.1",DV,0:POKE780,0:POKE781,0:POKE782,64:SYS65493
32 SYS57812"QS JUKE FONT",DV,0:POKE780,0:POKE781,0:POKE782,56:SYS65493
34 SYS57812"QS JUKE DRIVER",DV,0:POKE780,0:POKE781,0:POKE782,192:SYS65493
40 ML=64*256:MV=ML+309:V=53248:POKEMV+1,158:POKEMV+12,57:POKEMV+11,193
42 DR=49152:SYSDR+12:SYSDR+15
44 POKEV+21,0:SYSML:SYSML+6,14*64
50 DQ$(0)="[\[157][157]_<":DQ$(1)="=>[157][157]]^"
70 PRINT"[147]":POKE53272,31:SYSML+126,0,38,0,24,254,255,14,4
78 SYSML+30,3,36,3,7,255,6
80 SYSML+30,2,35,2,6,160,3+16
100 GOSUB600
112 SYSML+39,160
114 FORI=0TO1:SYSML+30,34,37,12+I*7,15+I*7,255,6
116 SYSML+30,33,36,11+I*7,14+I*7,255,8+16:PRINT"[158]";:SYSML+12,34,12+I*7,DQ$(I)
118 SYSML+15,2+I,33,36,12+I*5,15+I*5:NEXT
120 SYSML+12,0,24,"[155] [193][204][204] [207][206][167] [193][204][204] [207][198][198][167] [212][207][199][199][204][197] [193][204][204][167] [206][197][215] [196][201][211][203] "
122 SYSML+15,7,0,7,24,24
124 SYSML+15,8,8,16,24,24
126 SYSML+15,9,17,28,24,24
128 SYSML+15,10,29,39,24,24
132 SYSML+15,4,0,8,0,0
134 SYSML+15,11,9,16,0,0
136 SYSML+15,12,17,29,0,0
138 SYSML+15,13,30,39,0,0
150 GOSUB800
160 POKEV+21,0:SYSML+207,"$:Q.*",DV,140*256,144:POKEV+21,3
162 IFN%=0THENGOSUB700:GOSUB300:GOTO160
164 GOSUB800
166 SYSML+204,140*256
168 SYSML+30,2,31,9,22,255,8+16
170 SYSML+225,3+128,255,10,21,2,3,12,1,7,1,140*256,"",""
172 IFSL%=0THEN160
180 FORQ=1TOSL%
182 SYSML+192,Q
184 POKEV+21,0:SYSML+201,F$,DV,100*256:POKEV+21,3
186 SYSML+30,2,35,2,6,160,3+16
188 PRINT"[146][158]";:SYSML+198,19-(LEN(F$)/2),4,Q
190 GOSUB700
198 SYSDR,100,1
200 SYSML+9
208 IFPEEK(DR+46)=0THEN220
210 IFCR%=11THENSYSDR+6:Q=SL%:GOTO220
212 IFCR%=12THENGOSUB300:Q=SL%:NEXT:GOSUB600:GOTO150
214 IFCR%=13THENSYSML+3:SYSDR+6:SYSDR+18:POKEV+21,0:PRINT"[147]":GOTO40000
216 IFL2%THENSYSDR+6:GOTO220
218 GOTO200
220 NEXT
230 GOSUB600
240 GOTO170
300 SYSDR+6
310 SYSML+51,26+128,0,15,15,2,""
312 DV=VAL(W$)
314 OPEN15,DV,15:CLOSE15
316 IFST=-128THEN310
318 RETURN
600 SYSML+12,3,3,"[146][158][176][192][174] [178] [178] [178] [176][192][174] [178][176][189]   [178] [178] [178] [178][176][189][176][192][174]
602 [158]ML[170]12,3,4,"FOR(null) (null) (null) (null) (null) (null)   -<    (null) (null) (null) -< -<
604 SYSML+12,3,5,"[149][173][192][168] [173][192][189] [177] [173][192][189] [177][173][174] [173][192][189] [173][192][189] [177][173][174][173][192][189]
606 [142]
700 [158]ML[170]12,0,0,"LIST   (null)(null)ATN(null) THEN  (null)(null)(null)(null) THEN  STR$(null)RIGHT$(null)VAL:    THEN  (null)(null)RIGHT$(null)   "
710 [158]ML[170]12,25,0,[196](DV)
720 [142]
800 [158]ML[170]12,0,0,"LIST   (null)(null)ATN(null) THEN  (null)(null)(null)(null) THENPOKE  STR$(null)RIGHT$(null)VAL:    THEN  (null)(null)RIGHT$(null)   "
810 [158]ML[170]12,25,0,[196](DV)
820 [142]
999 [137]999
10000 D[178][194](186):N$[178]"0:B.QUICK JUKE":[159]15,D,15,"S"[170]N$:[160]15:[148]N$,D:[128]
40000 [151]53269,0
40002 [129]I[178]8[164]29:[151]820[170]I,I:[130]:[139]DV[177]8[175]DV[179]30[167][151]828,DV:[151]820[170]DV,8
40010 A$[178]"PRESENTER":[141]40030:A$[178]"HELLO CONNECT":[141]40030
40020 [153]"LOAD":[151]53272,23:[151]186,8:[151]2048,0:[151]44,8:[151]43,1:[128]
40030 [129]J[178]8[164]29:I[178][194](820[170]J):[139]I[178]14[167][130]
40040 [160]2:[159]2,I,2:[160]2:[139]ST[167]40060
40050 [160]15:[159]15,I,15,"R0:"[170]A$[170]"="[170]A$:[132]15,ER:[160]15:[139]ER[178]63[167]40070
40060 [130]:[142]
40070 A$[178]"HELLO CONNECT":Q$[178][199](34):[151]646,[194](53281):[153]"LOAD":[151]53272,23
40080 [153]"LOADP(null)2048,0:P(null)44,8:P(null)43,1:P(null)56,160:P(null)55,0:CLR:L(null)"Q$A$Q$","I
40090 [153]"RUN:":[151]631,13:[151]632,13:[151]198,2:[128]